//*Set Working Directory if needed*//
//* Should not need to be done if you are running the files   *//
//* per the instructions in the readme file  *//
//* cd Z:\Econ428_Sp15\Metelski\Documentation\Data\ *//

use Final\finaldatacleanappendix.dta, clear 


//*********************allindustriesemploymentmo3********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line allindustriesemploymentmo3 time if (area_fips == 21000), sort(time)  title(KY Total Employment: 2006-2011) note("*Data taken from third month of each quarter")    
//********************************WV*********************************//
graph twoway line allindustriesemploymentmo3 time if (area_fips == 54000), sort(time) title(WV Total Employment: 2006-2011) note("Data taken from third month of each quarter") 

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize allindustriesemploymentmo3  if (area_fips != 21000 & area_fips != 39000 & area_fips != 42000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize allindustriesemploymentmo3  if (area_fips == 21000) , detail
//********************************WV*********************************//
summarize allindustriesemploymentmo3  if (area_fips == 54000) , detail 


//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram allindustriesemploymentmo3  if (area_fips != 21000 & area_fips != 54000), title(Total Employment Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    

//*******************************Other*******************************//
tabulate area_fips if allindustriesemploymentmo3 == .  


//*********************allindustriesavgwklywage********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line allindustriesavgwklywage time if (area_fips == 21000), sort(time)  title(KY Average Weekly Wages: 2006-2011) note("*Data taken from third month of each quarter")    
//********************************WV*********************************//
graph twoway line allindustriesavgwklywage time if (area_fips == 54000), sort(time) title(WV Average Weekly Wages: 2006-2011) note("Data taken from third month of each quarter") 

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize allindustriesavgwklywage  if (area_fips != 21000 & area_fips != 39000 & area_fips != 42000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize allindustriesavgwklywage  if (area_fips == 21000) , detail
//********************************WV*********************************//
summarize allindustriesavgwklywage  if (area_fips == 54000) , detail 


//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram allindustriesavgwklywage  if (area_fips != 21000 & area_fips != 54000), title(Total Average Weekly Wages Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    

//*******************************Other*******************************//
tabulate area_fips if allindustriesemploymentmo3 == .  


//*********************allindustriestotalwages********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line allindustriestotalwages time if (area_fips == 21000), sort(time)  title(KY Total Wages: 2006-2011) note("*Data taken from third month of each quarter")    
//********************************WV*********************************//
graph twoway line allindustriestotalwages time if (area_fips == 54000), sort(time) title(WV Total Wages: 2006-2011) note("Data taken from third month of each quarter") 

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize allindustriestotalwages  if (area_fips != 21000 & area_fips != 39000 & area_fips != 42000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize allindustriestotalwages  if (area_fips == 21000) , detail
//********************************WV*********************************//
summarize allindustriestotalwages  if (area_fips == 54000) , detail 


//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram allindustriestotalwages  if (area_fips != 21000 & area_fips != 54000), title(Total Wages Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    

//*******************************Other*******************************//
tabulate area_fips if allindustriesemploymentmo3 == .  

//*********************allindustrymcoalemployment********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line allindustrymcoalemployment time if (area_fips == 21000), sort(time)  title(KY Total Employment Minus Coal Employment: 2006-2011) note("*Data taken from third month of each quarter")    
//********************************WV*********************************//
graph twoway line allindustrymcoalemployment time if (area_fips == 54000), sort(time) title(WV Total Employment Minus Coal Employment: 2006-2011) note("Data taken from third month of each quarter") 

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize allindustrymcoalemployment  if (area_fips != 21000 & area_fips != 39000 & area_fips != 42000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize allindustrymcoalemployment  if (area_fips == 21000) , detail
//********************************WV*********************************//
summarize allindustrymcoalemployment  if (area_fips == 54000) , detail 


//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram allindustrymcoalemployment  if (area_fips != 21000 & area_fips != 54000), title(Total Employment Minus Coal Employment: 2006-2011) note("*Data taken from third month of each quarter")  

//*******************************Other*******************************//
tabulate area_fips if allindustrymcoalemployment == .  

//*********************allindustrymcoaltotalwage********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line allindustrymcoaltotalwage time if (area_fips == 21000), sort(time)  title(KY Total Wages Minus Coal Wages: 2006-2011) note("*Data taken from third month of each quarter")    
//********************************WV*********************************//
graph twoway line allindustrymcoaltotalwage time if (area_fips == 54000), sort(time) title(WV Total Wages Minus Coal Wages: 2006-2011) note("Data taken from third month of each quarter") 

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize allindustrymcoaltotalwage  if (area_fips != 21000 & area_fips != 39000 & area_fips != 42000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize allindustrymcoaltotalwage  if (area_fips == 21000) , detail
//********************************WV*********************************//
summarize allindustrymcoaltotalwage  if (area_fips == 54000) , detail 


//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram allindustrymcoaltotalwage  if (area_fips != 21000 & area_fips != 54000), title(Total Wages Minus Coal Wages: 2006-2011) note("*Data taken from third month of each quarter")  

//*******************************Other*******************************//
tabulate area_fips if allindustrymcoaltotalwage == .  

//*******************************************************************//
//********************************COAL*******************************//
//*******************************************************************//

//*************************coalemploymentmo3*************************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line coalemploymentmo3 time if (area_fips == 21000), sort(time) title(KY Coal Employment: 2006-2011) note("*Data taken from third month of each quarter")   
//********************************WV*********************************//
graph twoway line coalemploymentmo3 time if (area_fips == 54000), sort(time) title(WV Coal Employment: 2006-2011) note("*Data taken from third month of each quarter")

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize coalemploymentmo3  if (area_fips != 21000 & area_fips != 54000 & coalemploymentmo3 !=0) , detail 
//********************************KY*********************************//
summarize coalemploymentmo3  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize coalemploymentmo3  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram coalemploymentmo3  if (area_fips != 21000 & area_fips != 54000 & coalemploymentmo3 !=0), title(Coal Employment Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    

//*******************************Other*******************************//
tabulate area_fips if coalemploymentmo3 == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*************************coalavgwklywage***************************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line coalavgwklywage time if (area_fips == 21000), sort(time) title(KY Coal Average Weekly Wage: 2006-2011) note("*Data taken from third month of each quarter")   
//********************************WV*********************************//
graph twoway line coalavgwklywage time if (area_fips == 54000), sort(time) title(WV Coal Average Weekly Wage: 2006-2011) note("*Data taken from third month of each quarter")

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize coalavgwklywage  if (area_fips != 21000 & area_fips != 54000 & coalavgwklywage !=0) , detail 
//********************************KY*********************************//
summarize coalavgwklywage  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize coalavgwklywage  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram coalavgwklywage  if (treatment==1 & area_fips != 21000 & area_fips !=54000 & coalavgwklywage !=0), title(Coal Avg. Weekly Wage Across All Counties: 2006-2011) 

//*******************************Other*******************************//
tabulate area_fips if coalavgwklywage == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//***************************coaltotalwages**************************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize coaltotalwages  if (area_fips != 21000 & area_fips !=54000 & coaltotalwages !=0) , detail 
//********************************KY*********************************//
summarize coaltotalwages  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize coaltotalwages  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram coaltotalwages  if (treatment==1 & area_fips != 21000 & area_fips !=54000), title(Coal Total Wages Across All Counties: 2006-2011) 

//*******************************Other*******************************//
tabulate area_fips if coaltotalwages == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*******************************************************************//
//****************************CONSTRUCTION***************************//
//*******************************************************************//

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*********************constructionemploymentmo3*********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line constructionemploymentmo3 time if (area_fips == 21000), sort(time) title(KY Construction Employment: 2006-2011) note("*Data taken from third month of each quarter")   
//********************************WV*********************************//
graph twoway line constructionemploymentmo3 time if (area_fips == 54000), sort(time) title(WV Construction Employment: 2006-2011) note("*Data taken from third month of each quarter")

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize constructionemploymentmo3  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize constructionemploymentmo3  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize constructionemploymentmo3  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram constructionemploymentmo3  if (area_fips != 21000 & area_fips != 54000), title(Construction Employment Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    

//*******************************Other*******************************//
tabulate area_fips if constructionemploymentmo3 == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//**********************constructionavgwklywage**********************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize constructionavgwklywage  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize constructionavgwklywage  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize constructionavgwklywage  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram constructionavgwklywage  if (area_fips != 21000 & area_fips != 54000), title(Construction Avg. Weekly Wage Across All Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if constructionavgwklywage == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//**********************constructiontotalwages***********************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize constructiontotalwages  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize constructiontotalwages  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize constructiontotalwages  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram constructiontotalwages  if (area_fips != 21000 & area_fips != 54000), title(Construction Total Wages Across All Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if constructiontotalwages == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*******************************************************************//
//****************************MANUFACTURING**************************//
//*******************************************************************//

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*********************manufacturingemploymentmo3********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line manufacturingemploymentmo3 time if (area_fips == 21000), sort(time) title(KY Manufacturing Employment: 2006-2011) note("*Data taken from third month of each quarter", size(medium))   
//********************************WV*********************************//
graph twoway line manufacturingemploymentmo3 time if (area_fips == 54000), sort(time) title(WV Manufacturing Employment: 2006-2011) note("*Data taken from third month of each quarter", size(medium))

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize manufacturingemploymentmo3  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize manufacturingemploymentmo3  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize manufacturingemploymentmo3  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram manufacturingemploymentmo3  if (area_fips != 21000 & area_fips != 54000), title(Manufacturing Employment Across All Counties: 2006-2011, size(medium)) note("*Data taken from third month of each quarter")    

//*******************************Other*******************************//
tabulate area_fips if manufacturingemploymentmo3 == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*********************manufacturingavgwklywage**********************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize manufacturingavgwklywage  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize manufacturingavgwklywage  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize manufacturingavgwklywage  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram manufacturingavgwklywage  if (area_fips != 21000 & area_fips != 54000), title(Manufacturing Avg. Weekly Wage Across All Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if manufacturingavgwklywage == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*********************manufacturingtotalwages***********************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize manufacturingtotalwages  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize manufacturingtotalwages  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize manufacturingtotalwages  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram manufacturingtotalwages  if (area_fips != 21000 & area_fips != 54000), title(Manufacturing Total Wages Across All Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if manufacturingtotalwages == .  


//*******************************************************************//
//****************************RETAIL TRADE***************************//
//*******************************************************************//

//*********************retailtradeemploymentmo3**********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line retailtradeemploymentmo3 time if (area_fips == 21000), sort(time) title(KY Retail Trade Employment: 2006-2011) note("*Data taken from third month of each quarter", size(medium))   
//********************************WV*********************************//
graph twoway line retailtradeemploymentmo3 time if (area_fips == 54000), sort(time) title(WV Retail Trade Employment: 2006-2011) note("*Data taken from third month of each quarter", size(medium))

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize retailtradeemploymentmo3  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize retailtradeemploymentmo3  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize retailtradeemploymentmo3  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram retailtradeemploymentmo3  if (area_fips != 21000 & area_fips != 54000), title(Retail Trade Employment Across All Counties: 2006-2011, size(medium)) note("*Data taken from third month of each quarter")    

//*******************************Other*******************************//
tabulate area_fips if retailtradeemploymentmo3 == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//**********************retailtradeavgwklywage***********************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize retailtradeavgwklywage  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize retailtradeavgwklywage  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize retailtradeavgwklywage  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram retailtradeavgwklywage  if (area_fips != 21000 & area_fips != 54000), title(Retail Trade Avg. Weekly Wage Across All Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if retailtradeavgwklywage == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//***********************retailtradetotalwages***********************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize retailtradetotalwages  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize retailtradetotalwages  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize retailtradetotalwages  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram retailtradetotalwages  if (area_fips != 21000 & area_fips != 54000), title(Retail Trade Total Wages Across All Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if retailtradetotalwages == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*******************************************************************//
//*******************************SERVICE*****************************//
//*******************************************************************//

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//************************serviceemploymentmo3***********************//

//******************************Graphs*******************************//
//********************************KY*********************************//
graph twoway line serviceemploymentmo3 time if (area_fips == 21000), sort(time) title(KY Service Employment: 2006-2011) note("*Data taken from third month of each quarter", size(medium))   
//********************************WV*********************************//
graph twoway line serviceemploymentmo3 time if (area_fips == 54000), sort(time) title(WV Service Employment: 2006-2011) note("*Data taken from third month of each quarter", size(medium))

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize serviceemploymentmo3  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize serviceemploymentmo3  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize serviceemploymentmo3  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram serviceemploymentmo3  if (area_fips != 21000 & area_fips != 54000), title(Service Employment Across All Counties: 2006-2011, size(medium)) note("*Data taken from third month of each quarter")    

//*******************************Other*******************************//
tabulate area_fips if serviceemploymentmo3 == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*************************serviceavgwklywage************************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize serviceavgwklywage  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize serviceavgwklywage  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize serviceavgwklywage  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram serviceavgwklywage  if (area_fips != 21000 & area_fips != 54000), title(Service Avg. Weekly Wage Across All Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if serviceavgwklywage == .  

//*******************************************************************//
//*******************************************************************//
//*******************************************************************//

//*************************servicetotalwages*************************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize servicetotalwages  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize servicetotalwages  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize servicetotalwages  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram servicetotalwages  if (area_fips != 21000 & area_fips != 54000), title(Service Total Wages Across All Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if servicetotalwages == .  

//*******************************************************************//
//*************************HISTGRAMS FOR LN**************************//
//*******************************************************************//

histogram lnallindustriesemployment if (area_fips != 21000 & area_fips != 54000), title(lnallindustriesemployment Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    
histogram lnallindustriestotalwages if (area_fips != 21000 & area_fips != 54000), title(lnallindustriestotalwages Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    
histogram lnallindustriesweeklywage if (area_fips != 21000 & area_fips != 54000), title(lnallindustriesweeklywage Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    

histogram lnallindustrymcoalemployment if (area_fips != 21000 & area_fips != 54000), title(lnallindustriesemployment Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    
histogram lnallindustrymcoaltotalwages if (area_fips != 21000 & area_fips != 54000), title(lnallindustriestotalwages Across All Counties: 2006-2011) note("*Data taken from third month of each quarter")    

histogram lncoalemployment if (area_fips != 21000 & area_fips != 54000 & coalemploymentmo3 != 0), title( lncoalemployment Across All Counties: 2006-2011, size(medium))
histogram lncoaltotalwages if (area_fips != 21000 & area_fips != 54000 & coalemploymentmo3 != 0), title( lncoaltotalwages Across All Counties: 2006-2011, size(medium))
histogram lncoalweeklywage if (area_fips != 21000 & area_fips != 54000 & coalemploymentmo3 != 0), title( lncoalweeklywage Across All Counties: 2006-2011, size(medium))

histogram lnconstructionemployment if (area_fips != 21000 & area_fips != 54000 ), title( lnconstructionemployment Across All Counties: 2006-2011, size(medium))
histogram lnconstructiontotalwages if (area_fips != 21000 & area_fips != 54000 ), title( lnconstructiontotalwages Across All Counties: 2006-2011, size(medium))
histogram lnconstructionweeklywage if (area_fips != 21000 & area_fips != 54000 ), title( lnconstructionweeklywage Across All Counties: 2006-2011, size(medium))

histogram lnmanufacturingemployment if (area_fips != 21000 & area_fips != 54000 ), title( lnmanufacturingemployment Across All Counties: 2006-2011, size(medium))
histogram lnmanufacturingtotalwages if (area_fips != 21000 & area_fips != 54000 ), title( lnmanufacturingtotalwages Across All Counties: 2006-2011, size(medium))
histogram lnmanufacturingweeklywage if (area_fips != 21000 & area_fips != 54000 ), title( lnmanufacturingweeklywage Across All Counties: 2006-2011, size(medium))

histogram lnretailemployment if (area_fips != 21000 & area_fips != 54000 ), title( lnretailemployment Across All Counties: 2006-2011, size(medium))
histogram lnretailtotalwages if (area_fips != 21000 & area_fips != 54000 ), title( lnretailtotalwages Across All Counties: 2006-2011, size(medium))
histogram lnretailweeklywage if (area_fips != 21000 & area_fips != 54000 ), title( lnretailweeklywage Across All Counties: 2006-2011, size(medium))

histogram lnserviceemployment if (area_fips != 21000 & area_fips != 54000 ), title( lnserviceemployment Across All Counties: 2006-2011, size(medium))
histogram lnservicetotalwages if (area_fips != 21000 & area_fips != 54000 ), title( lnservicetotalwages Across All Counties: 2006-2011, size(medium))
histogram lnserviceweeklywage if (area_fips != 21000 & area_fips != 54000 ), title( lnserviceweeklywage Across All Counties: 2006-2011, size(medium))

//*******************************************************************//
//*************************GRAPHS FOR OTHER**************************//
//*******************************************************************//

graph twoway line coalavgwklywage time if (area_fips ==21000), sort(time)  title(KY Coal Avg. Weekly Wage: 2006-2011)
graph twoway line coalavgwklywage time if (area_fips ==54000), sort(time)  title(WV Coal Avg. Weekly Wage: 2006-2011)

graph twoway line coaltotalwages time if (area_fips ==21000), sort(time)  title(KY Coal  Total Wages:  2006-2011)
graph twoway line coaltotalwages time if (area_fips ==54000), sort(time)  title(WV Coal  Total Wages:  2006-2011)

graph twoway line constructionavgwklywage time if (area_fips ==21000), sort(time)  title(KY Construction Avg. Weekly Wage: 2006-2011)
graph twoway line constructionavgwklywage time if (area_fips ==54000), sort(time)  title(WV Construction Avg. Weekly Wage: 2006-2011)

graph twoway line constructiontotalwage time if (area_fips ==21000), sort(time)  title(KY Construction  Total Wages:  2006-2011)
graph twoway line constructiontotalwage time if (area_fips ==54000), sort(time)  title(WV Construction  Total Wages:  2006-2011)

graph twoway line manufacturingavgwklywage time if (area_fips ==21000), sort(time)  title(KY Manufacturing Avg. Weekly Wage: 2006-2011)
graph twoway line manufacturingavgwklywage time if (area_fips ==54000), sort(time)  title(WV Manufacturing Avg. Weekly Wage: 2006-2011)

graph twoway line manufacturingtotalwage time if (area_fips ==21000), sort(time)  title(KY Manufacturing  Total Wages:  2006-2011)
graph twoway line manufacturingtotalwage time if (area_fips ==54000), sort(time)  title(WV Manufacturing  Total Wages:  2006-2011)

graph twoway line retailtradeavgwklywage time if (area_fips ==21000), sort(time)  title(KY Retail Trade Avg. Weekly Wage: 2006-2011)
graph twoway line retailtradeavgwklywage time if (area_fips ==54000), sort(time)  title(WV Retail Trade Avg. Weekly Wage: 2006-2011)

graph twoway line retailtradetotalwage time if (area_fips ==21000), sort(time)  title(KY Retail Trade  Total Wages:  2006-2011)
graph twoway line retailtradetotalwage time if (area_fips ==54000), sort(time)  title(WV Retail Trade  Total Wages:  2006-2011)

graph twoway line serviceavgwklywage time if (area_fips ==21000), sort(time)  title(KY Service Avg. Weekly Wage: 2006-2011)
graph twoway line serviceavgwklywage time if (area_fips ==54000), sort(time)  title(WV Service Avg. Weekly Wage: 2006-2011)

graph twoway line servicetotalwage time if (area_fips ==21000), sort(time)  title(KY Service  Total Wages:  2006-2011)
graph twoway line servicetotalwage time if (area_fips ==54000), sort(time)  title(WV Service  Total Wages:  2006-2011)

//*******************************************************************//
//*****************************MALEPOP100****************************//
//*******************************************************************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize malepop100  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize malepop100  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize malepop100  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram malepop100  if (area_fips != 21000 & area_fips != 54000), title(Male Pop. (100s) Across All Counties: 2006-2011, size(medium)) 
//******************************Graphs*******************************//
graph twoway line malepop100 time if (area_fips ==21000), sort(time)  title(KY Male Pop. (100s):  2006-2011)
graph twoway line malepop100 time if (area_fips ==54000), sort(time)  title(WV Male Pop. (100s):  2006-2011)

//*******************************Other*******************************//
tabulate area_fips if malepop100 == .  

//*******************************************************************//
//****************************FEMALEPOP100***************************//
//*******************************************************************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize femalepop100  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize femalepop100  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize femalepop100  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram femalepop100  if (area_fips != 21000 & area_fips != 54000), title(Female Pop. (100s) Across All Counties: 2006-2011, size(medium)) 
//******************************Graphs*******************************//
graph twoway line femalepop100 time if (area_fips ==21000), sort(time)  title(KY Female Pop. (100s):  2006-2011)
graph twoway line femalepop100 time if (area_fips ==54000), sort(time)  title(WV Female Pop. (100s):  2006-2011)

//*******************************Other*******************************//
tabulate area_fips if malepop100 == .  

//*******************************************************************//
//***************************UNEMPLOYED100***************************//
//*******************************************************************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize unemployed100  if (area_fips != 21000 & area_fips != 54000) , detail 
//********************************KY*********************************//
summarize unemployed100  if (area_fips == 21000) , detail 
//********************************WV*********************************//
summarize unemployed100  if (area_fips == 54000) , detail

//*****************************Histogram*****************************//
//*******************************Total*******************************//
histogram unemployed100  if (area_fips != 21000 & area_fips != 54000), title(Unemployed Pop. (100s) Across All Counties: 2006-2011, size(medium)) 
//******************************Graphs*******************************//
graph twoway line unemployed100 time if (area_fips ==21000), sort(time)  title(KY Unemployed Pop. (100s):  2006-2011)
graph twoway line unemployed100 time if (area_fips ==54000), sort(time)  title(WV Unemployed Pop. (100s):  2006-2011)

//*******************************Other*******************************//
tabulate area_fips if unemployed100 == .  

//*******************************************************************//
//*****************************PERCENTCOAL***************************//
//*******************************************************************//

//***************************Summary Stats***************************//
//*******************************Total*******************************//
summarize percentcoal  if (area_fips != 21000 & area_fips != 54000) , detail 
summarize percentcoal  if (area_fips != 21000 & area_fips != 54000 & percentcoal !=0) , detail 
//*****************************Histogram*****************************//
//******************************With 0*******************************//
histogram percentcoal  if (area_fips != 21000 & area_fips != 54000), title(Percent Coal Across All Counties: 2006-2011, size(medium)) 
//*****************************Without 0******************************//
histogram percentcoal  if (area_fips != 21000 & area_fips != 54000 & percentcoal !=0), title(Percent Coal Coal Counties: 2006-2011, size(medium)) 

//*******************************Other*******************************//
tabulate area_fips if percentcoal == .  

//*******************************************************************//
//******************************AREA_FIPS****************************//
//*******************************************************************//

//*******************************Other*******************************//
tabulate area_fips  if (area_fips != 21000 & area_fips != 54000)
tabulate area_title  if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//******************************TIME****************************//
//*******************************************************************//

//*******************************Other*******************************//
tabulate time  if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//*****************************TREATMENT*****************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(treatment)  legend(label(1 "Non-Treatment")) title("Number of Obs for Treatment and Non-Treatment", size(medium))  

//*******************************Other*******************************//
tabulate treatment  if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//*****************************COMPARISON****************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(comparison)  legend(label(1 "Non-Treatment")) title("Number of Obs for Comparison and Non-Comparison", size(medium))  

//*******************************Other*******************************//
tabulate comparison if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//*********************************PRE*******************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(pre)  legend(label(1 "Non-Treatment")) title("Number of Obs for Pre and Non-Pre", size(medium))  

//*******************************Other*******************************//
tabulate pre if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//********************************BOOM*******************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(boom)  legend(label(1 "Non-Treatment")) title("Number of Obs for Boom and Non-Boom", size(medium))  

//*******************************Other*******************************//
tabulate boom if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//********************************BUST*******************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(bust)  legend(label(1 "Non-Treatment")) title("Number of Obs for Bust and Non-Bust", size(medium))  

//*******************************Other*******************************//
tabulate bust if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//********************************POST*******************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(post)  legend(label(1 "Non-Treatment")) title("Number of Obs for Post and Non-Post", size(medium))  

//*******************************Other*******************************//
tabulate post if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//****************************TREATMENTPRE***************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(treatmentpre)  legend(label(1 "Non-Treatment")) title("Number of Obs for treatmentpre and Non-treatmentpre", size(medium))  

//*******************************Other*******************************//
tabulate treatmentpre if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//***************************TREATMENTBOOM***************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(treatmentboom)  legend(label(1 "Non-Treatment")) title("Number of Obs for treatmentboom and Non-treatmentboom", size(medium))  

//*******************************Other*******************************//
tabulate treatmentboom if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//****************************TREATMENTBUST**************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(treatmentbust)  legend(label(1 "Non-Treatment")) title("Number of Obs for treatmentbust and Non-treatmentbust", size(medium))  

//*******************************Other*******************************//
tabulate treatmentbust if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//***************************TREATMENTPOST***************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(treatmentpost)  legend(label(1 "Non-Treatment")) title("Number of Obs for treatmentpost and Non-treatmentpost", size(medium))  

//*******************************Other*******************************//
tabulate treatmentpost if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//*********************************Q1********************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(Q1)  legend(label(1 "Non-Treatment")) title("Number of Obs for Q1 and Non-Q1", size(medium))  

//*******************************Other*******************************//
tabulate Q1 if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//*********************************Q1********************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(Q2)  legend(label(1 "Non-Treatment")) title("Number of Obs for Q2 and Non-Q2", size(medium))  

//*******************************Other*******************************//
tabulate Q2 if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//*********************************Q3********************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(Q3)  legend(label(1 "Non-Treatment")) title("Number of Obs for Q3 and Non-Q3", size(medium))  

//*******************************Other*******************************//
tabulate Q3 if (area_fips != 21000 & area_fips != 54000)

//*******************************************************************//
//*********************************Q4********************************//
//*******************************************************************//

//***************************Summary Stats***************************//

//*****************************Bar Graph*****************************//
graph bar (count) area_fips if (area_fips != 21000 & area_fips != 54000), over(Q4)  legend(label(1 "Non-Treatment")) title("Number of Obs for Q4 and Non-Q4", size(medium))  

//*******************************Other*******************************//
tabulate Q4 if (area_fips != 21000 area_fips != 54000)

clear 
